Restore accidental change to insert-register

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 81ce153600ce26b0679ae4ddd5247ff577e93ac7..67615431b8f4d0cd818152eac81eb0eb8a14a733 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-07-09  Leo Liu  <sdl.web@gmail.com>
+
+       * register.el (insert-register): Restore accidental change on
+       2011-06-26.  (Bug#9028)
+
 2011-07-09  Glenn Morris  <rgm@gnu.org>
 
        * subr.el (remq): Handle the empty list.  (Bug#9024)

diff --git a/lisp/register.el b/lisp/register.el
index 221242546eca0123d5b2798e91057f8e77933341..89a725f28c5fee8c8138cac0f0e046084fc9b71e 100644 (file)
--- a/lisp/register.el
+++ b/lisp/register.el
@@ -329,6 +329,8 @@ Interactively, second arg is non-nil if prefix arg is supplied."
               "Don't know how to insert register %s"
               (single-key-description register))
       (funcall (registerv-insert-func val) (registerv-data val)))
+     ((consp val)
+      (insert-rectangle val))
      ((stringp val)
       (insert-for-yank val))
      ((numberp val)